home *** CD-ROM | disk | FTP | other *** search
/ Windows Expert / Windows Expert.iso / program / vbxdem.zip / INSTALL.BAT next >
DOS Batch File  |  1992-04-28  |  4KB  |  132 lines
  1. echo off
  2. cls
  3. echo     MicroHelp Demonstration Installation for Visual Basic
  4. echo.
  5. echo.
  6. if "%1" == "" goto NoPath
  7. if "%2" == "" goto NoPath
  8. echo Ready to install on your hard disk. Press ^C to abort or
  9. pause
  10. echo.
  11. echo Attempting to create \MHDEMOS directory on your hard disk. If this
  12. echo directory already exists, DOS will issue an error message, but you
  13. echo can ignore the message.
  14. echo.
  15. md %1
  16. md %1\MHDEMOS
  17. copy read.me %1\MHDEMOS
  18. echo.
  19. echo.
  20. echo Attempting to create subdirectory(s) for the demo(s) you have
  21. echo selected. If the directory already exists, DOS will issue an 
  22. echo error message, but you can ignore the message.
  23. echo.
  24. if "%2"=="ALL" goto C
  25. if "%2"=="all" goto C
  26. if "%2"=="U" goto U
  27. if "%2"=="u" goto U
  28. if "%2"=="V" goto V
  29. if "%2"=="v" goto V
  30. if "%2"=="C" goto C
  31. if "%2"=="c" goto C
  32. if "%2"=="N" goto N
  33. if "%2"=="n" goto N
  34. if "%2"=="X" goto X
  35. if "%2"=="x" goto x
  36. goto NoPath
  37. :C
  38. md %1\MHDEMOS\VBCOMM
  39. VBCOMM /e%1\MHDEMOS\VBCOMM
  40. if errorlevel 1 goto error
  41. if "%2"=="C" goto Finished
  42. if "%2"=="c" goto Finished
  43. :N
  44. md %1\MHDEMOS\NETLIB
  45. NETLIB /e%1\MHDEMOS\NETLIB
  46. if errorlevel 1 goto error
  47. if "%2"=="N" goto Finished
  48. if "%2"=="n" goto Finished
  49. :V
  50. md %1\MHDEMOS\VBTOOLS
  51. VBTOOLS2 /e%1\MHDEMOS\VBTOOLS
  52. if errorlevel 1 goto error
  53. if "%2"=="V" goto Finished
  54. if "%2"=="v" goto Finished
  55. :X
  56. md %1\MHDEMOS\VBXREF
  57. VBXDEM /e%1\MHDEMOS\VBXREF
  58. if errorlevel 1 goto error
  59. if "%2"=="X" goto Finished
  60. if "%2"=="x" goto Finished
  61. :U
  62. md %1\MHDEMOS\VBMUSCLE
  63. VBMUSCLE /e%1\MHDEMOS\VBMUSCLE
  64. if errorlevel 1 goto error
  65. :Finished
  66. if "%2"=="n" goto VBRUNFINAL
  67. if "%2"=="N" goto VBRUNFINAL
  68. if "%2"=="c" goto VBRUNFINAL
  69. if "%2"=="C" goto VBRUNFINAL
  70. :DLLS
  71. VBT2RT /e%1\MHDEMOS
  72. echo.
  73. echo Please copy the MH??200.VBX file from %1\MHDEMOS 
  74. echo to a directory in your path
  75. echo.
  76. echo               ***** CAUTION *****
  77. echo.
  78. echo If you are already a user of VBTools 2, the MH??200.VBX files
  79. echo are the *RUNTIME* versions. If you have already installed
  80. echo VBTOOLS 2, you can delete the DLL's by issuing the following
  81. echo command from the DOS prompt:
  82. echo.
  83. echo       DEL %1\MHDEMOS\MH??200.VBX
  84. echo.
  85. :VBRUNFINAL
  86. pause
  87. cls
  88. echo.
  89. echo In order to run the demos for Visual Basic products, your system 
  90. echo must have the file VBRUN100.DLL in your PATH. If you don't already
  91. echo have Visual Basic, you can download VBRUN100.DLL from many BBS's
  92. echo around the country. In addition, the file is available from the
  93. echo following locations:
  94. echo.
  95. echo     CompuServe: GO MSBASIC
  96. echo                 LIB 5
  97. echo                 D VBRUN.ZIP 
  98. echo.
  99. echo     MicroHelp BUG BBS: 
  100. echo                 9600+ baud: (404) 552-0567
  101. echo             300-2400  baud: (404) 594-9625
  102. echo.
  103. echo             From the main menu prompt, type:
  104. echo.
  105. echo                 D VBRUN.ZIP
  106. :Fin2
  107. echo.
  108. echo Installation of the demo(s) is complete! 
  109. goto end
  110. :error
  111. echo                            **** E R R O R ****
  112. echo.
  113. echo     An error occurred during the installation. Most likely, your
  114. echo     hard disk is full. Please correct the problem and run the INSTALL
  115. echo     batch file again.
  116. echo.
  117. goto end
  118. :NoPath
  119. echo.
  120. echo     Insert the demonstration diskette in drive A: and close the
  121. echo     latch. Next, log onto drive A: by typing 'A:' followed by [Enter].
  122. echo.
  123. echo.
  124. echo     Syntax:   INSTALL Drive: Option
  125. echo.
  126. echo     Where 'Drive:' is the drive letter of the hard disk
  127. echo     drive where you wish to install this product.
  128. echo.
  129. echo     See the READ.ME file for installation options.
  130. echo.
  131. :end
  132.